UsedDays property

Returns a Long value indicating the number of days since the first time it was called. Read-only.

Examples:

' Evaluation Period
If (ActiveLock1.UsedDays > 21) Then
  MsgBox "Your evaluation period has expired! Please register!"
End If

NOTE: This property is often used with the RegisteredUser property, because you don't want to display the nag screen if the user has already registered.

' Evaluation Period (Better example)
If Not (ActiveLock1.RegisteredUser) And ActiveLock1.UsedDays > 21 Then
  MsgBox "Your evaluation period has expired!"
End If

See also: LastRunDate property.